exch begin FontBBox 2 get 0 FontBBox aload pop setcachedevice dup 49 gt {
} {
dup 48 lt {
} {
49 eq dim dup 3 -1 roll [1 0 0 1 0 0] [0] dup 32 string 0 FontPat {
2 {
3 copy put 3 copy exch 16 add exch put exch 1 add exch
} repeat pop
} forall pop 0 exch put cvx imagemask
} ifelse
} ifelse end
} def FontName currentdict definefont end
} bdf /patfill {
dup whitepat eq {
pop exch not {
{
fill
} {
eofill
} ifelse
} {
pop
} ifelse
} {
dup blackpat eq {
pop exch {
{
fill
} {
eofill
} ifelse
} {
pop
} ifelse
} {
exch {
clip
} {
eoclip
} ifelse dup cvfn dup FontDirectory exch known {
exch pop findfont
} {
pop patdef
} ifelse /fm matrix def ctm 3 get 0 ge {
-1
} {
1
} ifelse matrix defaultmatrix 3 get abs 1 gt {
4
} {
8
} ifelse mul dup abs fm exch 0 exch put fm exch 3 exch put fm makefont setctm exch {
/str fstr def
} {
/str bstr def
} ifelse begin currentdict setfont FontMatrix concat dim 0 dtransform 0 dim dtransform box astore {
round dim div
} forall 0 0 transform round exch round exch tm astore setmatrix FontMatrix tm invertmatrix pop pathbbox dim div ceiling exch dim div ceiling 4 2 roll dim div floor exch dim div floor exch 4 2 roll 3 index sub cvi exch 2 index sub cvi 4 2 roll dim mul exch dim mul exch moveto {
gsave tm concat dup strlen idiv {
str show
} repeat str 0 2 index strlen mod getinterval show grestore 0 dim rmoveto
} repeat pop end
} ifelse
} ifelse
} bdf end grestore
%%EndSetup
%%Page: 1 1
%%PageBoundingBox: 0 0 612 792
%%PageFonts: (atend)
%%BeginPageSetup
%%BeginFeature: *PageSize Letter
2 dict dup /PageSize [612 792] put dup /ImagingBBox null put
